home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / 91xx / 9111b.d64 / demo m&t 2 (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  1KB  |  36 lines
  1. 1 REM LASER - DEMO- UND STEUER-PROGRAMM
  2. 2 REM VON NIKOLAUS HEUSLER         8.91
  3. 3 REM ZWENGAUERWEG 18, 8000 MUENCHEN 71
  4. 4 :
  5. 10 IFPEEK(49155)<>3THENLOAD"LASER.CODE",8,8
  6. 20 SYS49152:SP=8
  7. 30 PRINT"[147]LASER-STEUER- UND DEMOPROGRAMM    M&T/NH
  8. 40 [153]"TASTEN:  + WAIT /  - WAIT ..... VERZOEGERUNG
  9. 42 PRINT"         S [146] ........... PROGRAMM-PAUSE
  10. 43 [153]"         W WAIT ........... WEITER
  11. 44 PRINT"         X [146] ........... ENDE
  12. 90 [137]900
  13. 230 [151]6,BR:[151]2,1:[151]3,1:[151]4,M1:[151]5,M2:[142]
  14. 800 [139]PP[178]1[167]810
  15. 802 PP[178]1:[153]""[163]22)"(PAUSE)":[142]
  16. 810 PP[178]0:[153]""[163]22)"       ":[142]
  17. 900 [140]:[129]DK[178]1[164]15
  18. 902 [135]M1,M2,BR:[141]230
  19. 904 [129]DI[178]1[164]SP[172]8
  20. 906 [153]"   VERZOEGERUNG:"SP"CMD  "
  21. 907 [153]"        SCHRITT:"DK"CMD  "
  22. 908 [161]A$:[151]198,.
  23. 910 [139]A$[178]"+"[167]SP[178]SP[170]1:[139]SP[177]40[167]SP[178]40
  24. 912 [139]A$[178]"-"[167]SP[178]SP[171]1:[139]SP[179]0[167]SP[178]0
  25. 913 [139]A$[178]"+"[176]A$[178]"-"[167]926
  26. 914 [139]A$[178]"X"[167][158]49152:[158]65418:[151]56325,64:[158]65409:[128]
  27. 916 [139]A$[178]"W"[167]926
  28. 918 [139]A$[178]"S"[167][141]800
  29. 920 [139]PP[167]DI[178]1
  30. 924 [130]DI
  31. 926 [130]DK:[137]900
  32. 950 [131]70,59,76,246,31,235,209,216,5,129,61,33
  33. 952 [131]48,252,150,94,152,53,243,116,248,30,94,195
  34. 954 [131]221,49,38,212,80,88,10,200,86,145,44,70,17,116,220
  35. 956 [131]15,117,232,160,100,60
  36.